home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Business Assistant
/
Business Assistant.iso
/
home
/
people
/
install.bat
< prev
next >
Wrap
DOS Batch File
|
1990-04-07
|
10KB
|
311 lines
echo off
rem PEOPLE INSTALL PROGRAM
rem Easy Automation, Inc., P.O. Box 670041, Marietta, Georgia 30066-0118
rem
cls
echo.
echo.
echo ┌──────────────────────────┐
echo │ │
echo │ P E O P L E │
echo │ │
echo │ INSTALLATION PROGRAM │
echo │ │
echo └──────────────────────────┘
echo.
echo.
echo.
if not exist people1.exe goto GETDISK
if not exist people2.exe goto GETDISK
if not exist config.sys goto GETDISK
if "%1==" goto HELPINST
for %%f in (B:,b:) do if %1.==%%f. goto COPYF
for %%f in (A:,a:) do if %1.==%%f. goto COPY1
for %%f in (C:,c:,D:,d:,E:,e:,F:,f:,G:,g:,H:,h:,I:,i:,Y:,y:) do if %1.==%%f. goto STARTH
for %%f in (J:,j:,K:,k:,L:,l:,M:,m:,N:,n:,O:,o:,P:,p:,Z:,z:) do if %1.==%%f. goto STARTH
for %%f in (Q:,q:,R:,r:,S:,s:,T:,t:,U:,u:,V:,v:,W:,w:,X:,x:) do if %1.==%%f. goto STARTH
goto BADDRIVE
:STARTH
if "%2==" goto NODIR
:OWNDIR
echo.
echo.
echo Creating %2 subdirectory...
md %1\%2
goto COPYH
:NODIR
echo No subdirectory was requested,
echo.
echo Creating PEOPLE subdirectory...
md %1\PEOPLE
if "%2==" goto COPYHNO
:COPYH
echo.
echo Copying files to drive %1\%2...
echo.
people1 %1\%2
people2 %1\%2
copy readme %1\%2
goto CHECK
:COPYHNO
echo.
echo Copying files to drive %1\PEOPLE...
echo.
people1 %1\PEOPLE
people2 %1\PEOPLE
copy readme %1\PEOPLE
:CHECK
if not exist c:\config.sys copy config.sys c:\
goto TESTH
goto OK
:COPY1
a:
echo
echo ┌───────────────────────────────────────────────────────┐
echo │ │
echo │ You should be installing PEOPLE on a single │
echo │ drive system. The A: disk drive *MUST* be │
echo │ either 720 K, 1.2 Mb, or 1.44 Mb format!! │
echo │ │
echo │ USE BACKUP COPY OF PROGRAM!! │
echo │ │
echo │ Press Ctrl-Break to ABORT or │
echo └───────────────────────────────────────────────────────┘
echo.
pause
cls
echo.
echo Copying files on drive %1\...
echo.
people1
if not exist %1people.exe goto NOFILE
if not exist %1error.txt goto NOFILE
people2
if not exist %1people.win goto NOFILE
if not exist %1people.hlp goto NOFILE
if not exist %1people.dbf goto NOFILE
if not exist %1name.ndx goto NOFILE
if not exist %1company.ndx goto NOFILE
if not exist %1sortindx.ndx goto NOFILE
del people1.exe
del people2.exe
goto OK
:COPYF
a:
echo ┌───────────────────────────────────────────────────────┐
echo │ │
echo │ Make sure you have 2 formatted disks ready! │
echo │ │
echo │ Disk #1 - PEOPLE PROGRAM │
echo │ Disk #2 - PEOPLE DATA │
echo │ │
echo │ Press Ctrl-Break to ABORT and format disks, or │
echo │ │
echo └───────────────────────────────────────────────────────┘
echo.
pause
cls
echo.
echo.
echo.
echo.
echo.
echo.
echo Put your formatted PROGRAM disk (#1) in drive B:
echo.
echo.
echo.
pause
echo.
echo Copying files to drive %1\...
echo.
people1 %1
copy readme %1
if not exist %1people.exe goto NOFILE
if not exist %1error.txt goto NOFILE
echo.
echo.
echo.
echo Now put your formatted DATA disk (#2) in drive B:
echo.
echo.
echo.
pause
echo.
echo Copying files to drive %1...
echo.
people2 %1
goto TESTF
:HELPINST
echo
cls
echo ╔══════════════[ INCORRECT COMMAND ]═════════════╗
echo ║ ║
echo ║ Install on 2 - 360K FLOPPY DISK system, type ║
echo ║ ║
echo ║ "INSTALL B:" ║
echo ╟──────────────────────────────────────────────────╢
echo ║ Install on 1 - 720K, 1.2Mb, 1.44Mb FLOPPY DISK ║
echo ║ ║
echo ║ "INSTALL A:" ║
echo ╟──────────────────────────────────────────────────╢
echo ║ To install on HARD DISK system and let ║
echo ║ program create \PEOPLE subdirectory, type ║
echo ║ ║
echo ║ "INSTALL <drive:>" ║
echo ║ ║
echo ║ (e.g. "INSTALL C:" ) ║
echo ╟──────────────────────────────────────────────────╢
echo ║ To install on HARD DISK system and YOU ║
echo ║ name your own subdirectory name, type ║
echo ║ ║
echo ║ "INSTALL <drive:> <subdirectory>" ║
echo ║ (e.g. "INSTALL C: MYDIR" ) ║
echo ╚══════════════════════════════════════════════════╝
goto END
:BADDRIVE
echo
echo Invalid drive letter specified. (Or forgot :)
echo.
echo Install is aborted.
echo.
echo HELP is on the way...
echo.
echo.
pause
goto Helpinst
:GETDISK
echo
echo Cannot find file PEOPLE1.EXE or PEOPLE2.EXE
echo.
echo Make sure all files are on the default drive and try again!
echo.
echo INSTALLATION ABORTED...
echo.
goto END
:TESTH
if "%2==" goto TESTHNO
if not exist %1\%2\people.exe goto NOFILE
if not exist %1\%2\people.win goto NOFILE
if not exist %1\%2\people.hlp goto NOFILE
if not exist %1\%2\people.dbf goto NOFILE
if not exist %1\%2\error.txt goto NOFILE
if not exist %1\%2\name.ndx goto NOFILE
if not exist %1\%2\company.ndx goto NOFILE
if not exist %1\%2\sortindx.ndx goto NOFILE
goto OK
:TESTHNO
if not exist %1\people\people.exe goto NOFILE
if not exist %1\people\people.win goto NOFILE
if not exist %1\people\people.hlp goto NOFILE
if not exist %1\people\people.dbf goto NOFILE
if not exist %1\people\error.txt goto NOFILE
if not exist %1\people\name.ndx goto NOFILE
if not exist %1\people\company.ndx goto NOFILE
if not exist %1\people\sortindx.ndx goto NOFILE
goto OK
:TESTF
if not exist %1people.win goto NOFILE
if not exist %1people.hlp goto NOFILE
if not exist %1people.dbf goto NOFILE
if not exist %1name.ndx goto NOFILE
if not exist %1company.ndx goto NOFILE
if not exist %1sortindx.ndx goto NOFILE
goto OK
:NOFILE
echo
cls
echo.
echo.
echo ┌───────────────────────────────────────────────────────┐
echo │ │
echo │ Files did not copy properly! │
echo │ │
echo │ Make sure there is enough disk space and try again. │
echo │